
module Soap

  def header
      %Q{<?xml version="1.0"?>
        <SOAP-ENV:Envelope xmlns:SOAP-ENV="http://schemas.xmlsoap.org/soap/envelope/"
                           xmlns:wsa="http://schemas.xmlsoap.org/ws/2004/08/addressing"
                           xmlns:wsse="http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-wssecurity-secext-1.0.xsd"
                           xmlns:wsu="http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-wssecurity-utility-1.0.xsd"
                           xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance">
            <SOAP-ENV:Header />
           <SOAP-ENV:Body>}
  end

  def footer
       %Q{</SOAP-ENV:Body>
        </SOAP-ENV:Envelope>}
  end

  def make(body)
    yield header + body + footer
  end

end
